program MyRadio;

{$R *.dres}

uses
  Winapi.Windows,
  Vcl.Forms,
  Vcl.Themes,
  Vcl.Styles,
  playradio in 'playradio.pas',
  config in 'config.pas',
  main in 'main.pas' {frm_main},
  about in 'about.pas' {frm_about};

{$R *.res}

var
  Mutex: THandle;

begin
  Mutex := CreateMutex(nil, True, 'BB3CD1A8-BCF8-431D-A822-AA3D337E5D41');
  if GetLastError() <> ERROR_ALREADY_EXISTS then
  begin
    Application.Initialize();
    Application.ShowMainForm := false;
    TStyleManager.TrySetStyle('Turquoise Gray');
    Application.CreateForm(Tfrm_main, frm_main);
  Application.Run();
  end;

end.
